Public Class B1FormInitializePar
    Implements SAPBoAddon.B1AddonBase.AddonEventParameter

    Private _FatherUID As String
    Private _KeyValue As String
    Private _CallType As B1FormCallType
    Private _parObject As Object

    Public Property FatherFormUID() As String
        Get
            Return _FatherUID
        End Get
        Set(ByVal value As String)
            _FatherUID = value
        End Set
    End Property

    Public Property KeyValue() As String
        Get
            Return _KeyValue
        End Get
        Set(ByVal value As String)
            _KeyValue = value
        End Set
    End Property

    Public Property CallType() As B1FormCallType
        Get
            Return _CallType
        End Get
        Set(ByVal value As B1FormCallType)
            _CallType = value
        End Set
    End Property

    Public Property parObject() As Object
        Get
            Return _parObject
        End Get
        Set(ByVal value As Object)
            _parObject = value
        End Set
    End Property

End Class

Public Enum B1FormCallType
    ct_MenuCall = 0
    ct_FormItemCall = 1
    ct_LinkButtonCall = 2
End Enum
